home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 26 / Cream of the Crop 26.iso / program / ddj0897.zip / DYN401.ZIP / kernel / jumpto / jumpto.ms2 < prev    next >
Text File  |  1995-08-08  |  1KB  |  63 lines
  1. ;  Dynace jumpto code for Microsoft C large memory model
  2. ;   (an older version, well tested on older compilers)
  3. ;
  4. ;    Static Name Aliases
  5. ;
  6.     TITLE   jumpto.c
  7.     NAME    jumpto
  8.  
  9.     .8087
  10. JUMPTO_TEXT    SEGMENT  WORD PUBLIC 'CODE'
  11. JUMPTO_TEXT    ENDS
  12. _DATA    SEGMENT  WORD PUBLIC 'DATA'
  13. _DATA    ENDS
  14. CONST    SEGMENT  WORD PUBLIC 'CONST'
  15. CONST    ENDS
  16. _BSS    SEGMENT  WORD PUBLIC 'BSS'
  17. _BSS    ENDS
  18. DGROUP    GROUP    CONST, _BSS, _DATA
  19.     ASSUME  CS: JUMPTO_TEXT, DS: DGROUP, SS: DGROUP
  20. EXTRN    __acrtused:ABS
  21. JUMPTO_TEXT      SEGMENT
  22.     ASSUME    CS: JUMPTO_TEXT
  23. ; Line 17
  24.     PUBLIC    __jumpToMethod
  25. __jumpToMethod    PROC FAR
  26.     push    bp
  27.     mov    bp,sp
  28. ; Line 18
  29. ;    func = 6
  30. ; Line 24
  31. ;    call    DWORD PTR [bp+6]    ;func
  32. ; Line 25
  33. ;    pop    bp
  34. ;    ret    
  35. ;
  36. ;
  37. ;    NEW CODE:
  38. ;
  39. ;    save jump address
  40. ;
  41.     mov    ax, word ptr [bp+6]
  42.     mov    dx, word ptr [bp+8]
  43. ;
  44. ;    restore current state
  45. ;
  46. ;    pop    bp
  47. ;
  48. ;    restore previous state
  49. ;
  50. ;    add    dp,8
  51.     add    sp,10
  52.     pop    bp
  53. ;
  54. ;    perform jump
  55. ;
  56.     push    dx
  57.     push    ax
  58.     ret
  59.  
  60. __jumpToMethod    ENDP
  61. JUMPTO_TEXT    ENDS
  62. END
  63.